home *** CD-ROM | disk | FTP | other *** search
/ TeX 1995 July / TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / dviware / screenview / vms / crude.com < prev    next >
Text File  |  1994-04-24  |  437b  |  22 lines
  1. $ if (p1 .nes. "") then goto file_given
  2. $ type sys$input
  3.  
  4. Usage:   screenview file [first_page max_pages magnification]
  5.  
  6. $ exit
  7. $
  8. $ file_given:
  9. $ open/write temp sys$scratch:crude.tmp
  10. $ write temp p1
  11. $ write temp p2
  12. $ write temp p3
  13. $ write temp p4
  14. $ close temp
  15. $ on warning then goto finish
  16. $ define/user sys$input sys$scratch:crude.tmp
  17. $ r TeX_Root:[Drivers.Screenview]Crudetype
  18. $
  19. $ finish:
  20. $ delete/nolog sys$scratch:crude.tmp;
  21. $ exit
  22.